<?php
 Include ("../../include/var_temp.inc") ;
 // Regularisation a la journee
              $id_cpe = utilparcode ($_SESSION ["code"]) ;
	      $nom_cpe = nom_utilparsession ($_SESSION ["code"],1) ;
              If (IsSet ($regularisation))
	       {
	        If ($regularisation == 1)
	         {
		  If ($justificatif == 0)
		   {
		    // Insertion d'un nouveau justificatif
		    $ok = SQL_commande ("INSERT INTO abs_types_justificatifs (id_abs_type_justificatif,nom) VALUES ('','".$nouv_just."')", $id_sql) ;
		    $jst = SQL_commande ("SELECT id_abs_type_justificatif FROM abs_types_justificatifs WHERE nom='".$nouv_just."' LIMIT 1", $id_sql) ;
		    $j = SQL_ligne_suivante ($jst) ;
		    $justificatif = $j [0] ;
		   }
                  If ($motif == 0)
		   {
		    // Insertion d'un nouveau motif
		    $ok = SQL_commande ("INSERT INTO abs_motifs (id_abs_motif,nom) VALUES ('','".$nouv_motif."')", $id_sql) ;
		    $mtf = SQL_commande ("SELECT id_abs_motif FROM abs_motifs WHERE nom='".$nouv_motif."' LIMIT 1", $id_sql) ;
		    $m = SQL_ligne_suivante ($mtf) ;
		    $motif = $m [0] ;
		   }
		  $req_saisies = "UPDATE abs_saisies SET regularisation='1' WHERE" ;
		  $req_regul = "INSERT INTO abs_regularisations (id_abs_regularisation,id_abs_saisie,id_abs_justificatif,id_abs_motif,date,heure) VALUES " ;
		  $ok = 0 ;
		  $afaire = 0 ;
		  For ($i = 1 ; $i <= $nombre ; $i++)
	           {
		    // Sequence numero $i selectionnee ?
		    $s = "\$s_".$i ; Eval ("\$s=\"$s\";") ;
		    If ($s == 1)
		     {
		      // Oui on parcours l'ensemble des heures
                      $nh = "\$h_".$i ; Eval ("\$nh=\"$nh\";") ;
		      For ($j = 1 ; $j <= $nh ;$j++)
		       {
		        $a = "\$a_".$i."_".$j ; Eval ("\$a=\"$a\";") ;
		        If ($ok != 0) { $req_saisies .= " OR " ; $req_regul .= "," ; }
		        $req_saisies .= " id_abs_saisie='".$a."'" ;
		        $req_regul .= "('','".$a."','".$justificatif."','".$motif."','".Date ("Y-m-d")."','".Date ("H:i:s")."')" ;
		        $ok = 1 ;
			$afaire++ ;
                       }
                     }
		   }
                  If ($afaire)
		   {
                    $ok = SQL_commande ($req_saisies, $id_sql) ;
                    //echo $req_saisies."<BR>" ;
		    $ok = SQL_commande ($req_regul, $id_sql) ;
		    //echo $req_regul."<BR>" ;
		    $mess = 1 ;
                   }
                  Else { $mess = 2 ; }
		 }
	       }
	      // Requete avec EDT
	      $requete = "SELECT u.id_utilisateur,u.civilite,u.nom,u.prenom,
	                         d.*,
			         h.debut,h.fin,
	                         e.id_eleve,e.repere1,e.repere2,e.classe,e.nom AS nom_eleve,e.prenoms AS prenoms_eleve,e.sexe,
			 	 c.nom AS nom_classe,c.nom_bref AS nom_bref_classe,
				 t.nom_f,t.nom_g,t.couleur_fond,t.couleur_texte,
				 s.id_abs_saisie,s.tranche,s.date,s.commentaires,s.arrivee,s.discipline
                            FROM abs_saisies s,eleves e,utilisateurs u,disciplines d,
				 abs_horaires h,abs_types_saisie t,classes c
                           WHERE s.eleve='".$id_eleve."'
			     AND s.eleve=e.id_eleve
	                     AND e.classe=c.id_classe" ;
              If ($date) { $requete .= " AND s.date='".$date."'" ; }
              If (($tt_classes_cpe == 0) ANd ($droit_courant = $droit_cpe)) { $requete .= " AND c.cpe='".$id_cpe."'" ; }
	      $requete .= "  AND s.regularisation='0'
			     AND s.prof=u.id_utilisateur
			     AND s.discipline=d.id_discipline
			     AND s.tranche=h.id_abs_horaire
			     AND s.type=t.type
                        ORDER BY s.date,h.debut,u.nom,u.prenom,e.nom,e.prenoms" ;
              // Requete sans EDT
	      $requete = "SELECT h.debut,h.fin,
	                         e.id_eleve,e.repere1,e.repere2,e.classe,e.nom AS nom_eleve,e.prenoms AS prenoms_eleve,e.sexe,
			 	 c.nom AS nom_classe,c.nom_bref AS nom_bref_classe,
				 t.nom_f,t.nom_g,t.couleur_fond,t.couleur_texte,
				 s.id_abs_saisie,s.tranche,s.date,s.commentaires,s.arrivee,s.discipline
                            FROM abs_saisies s,eleves e,abs_horaires h,abs_types_saisie t,classes c
                           WHERE s.eleve='".$id_eleve."'
			     AND s.eleve=e.id_eleve
	                     AND e.classe=c.id_classe" ;
              If ($date) { $requete .= " AND s.date='".$date."'" ; }
              If (($tt_classes_cpe == 0) ANd ($droit_courant = $droit_cpe)) { $requete .= " AND c.cpe='".$id_cpe."'" ; }
	      $requete .= "  AND s.regularisation='0'
			     AND s.tranche=h.id_abs_horaire
			     AND s.type=t.type
                        ORDER BY s.date,h.debut,e.nom,e.prenoms" ;
              //echo $requete ;
              $resultats = SQL_commande ($requete, $id_sql) ;
              If (SQL_nbr_lignes ($resultats) > 0)
	       {
	        Echo "<HTML>\n" ;
                Echo " <HEAD>\n" ;
                entete_html ("Garennes", "", 1) ;
	        Echo styles ("none", "none", "none", $l ["lien"], "none") ;
		Include ("./abs_fenetre.js" );
	        Echo "  <SCRIPT>\n" ;
	        Echo "   var nj1='nouveau justificatif'\n" ;
	        Echo "   var nj2=''\n" ;
	        Echo "   var nm1='nouveau motif'\n" ;
	        Echo "   var nm2=''\n" ;
	        Echo "   function active_just()\n" ;
	        Echo "    {\n" ;
	        Echo "     document.regul.nouv_just.disabled=0\n" ;
	        Echo "     document.regul.nouv_just.readonly=0\n" ;
	        Echo "     document.regul.nouv_just.value=nj2\n" ;
	        Echo "     document.regul.nouv_just.focus()\n" ;
	        Echo "    }\n" ;
	        Echo "   function desactive_just()\n" ;
	        Echo "    {\n" ;
	        Echo "     if (document.regul.nouv_just.disabled==0)\n" ;
	        Echo "      {\n" ;
	        Echo "       if (document.regul.nouv_just.value!=nj1 && document.regul.nouv_just.value!='')\n" ;
	        Echo "        {\n" ;
	        Echo "         nj2 = document.regul.nouv_just.value\n" ;
	        Echo "         document.regul.nouv_just.value=nj2\n" ;
	        Echo "        }\n" ;
	        Echo "       else { document.regul.nouv_just.value=nj1 }\n" ;
	        Echo "       document.regul.nouv_just.disabled=1\n" ;
	        Echo "       document.regul.nouv_just.readonly=1\n" ;
	        Echo "      }\n" ;
	        Echo "    }\n" ;
	        Echo "   function active_motif()\n" ;
	        Echo "    {\n" ;
	        Echo "     document.regul.nouv_motif.disabled=0\n" ;
	        Echo "     document.regul.nouv_motif.readonly=0\n" ;
	        Echo "     document.regul.nouv_motif.value=nm2\n" ;
	        Echo "     document.regul.nouv_motif.focus()\n" ;
	        Echo "    }\n" ;
	        Echo "   function desactive_motif()\n" ;
	        Echo "    {\n" ;
	        Echo "     if (document.regul.nouv_motif.disabled==0)\n" ;
	        Echo "      {\n" ;
	        Echo "       if (document.regul.nouv_motif.value!=nm1 && document.regul.nouv_motif.value!='')\n" ;
	        Echo "        {\n" ;
	        Echo "         nm2 = document.regul.nouv_motif.value\n" ;
	        Echo "         document.regul.nouv_motif.value=nm2\n" ;
	        Echo "        }\n" ;
	        Echo "       else { document.regul.nouv_motif.value=nm1 }\n" ;
	        Echo "       document.regul.nouv_motif.disabled=1\n" ;
	        Echo "       document.regul.nouv_motif.readonly=1\n" ;
	        Echo "      }\n" ;
	        Echo "    }\n" ;
	        Echo "   function modif_motif()\n" ;
	        Echo "    {\n" ;
	        Echo "     if (document.regul.motif.value==0) { active_motif() }\n" ;
	        Echo "     else { desactive_motif() }\n" ;
	        Echo "    }\n" ;
	        Echo "   function change_selection ()\n" ;
	        Echo "    {\n" ;
	        Echo "     var e=document.regul\n" ;
	        $compteur = 1 ;
	        $nbr_ligne = 0 ;
	        $nbr_col = 1 ;
	        $lg_el = 0 ;
	        $classe_id = 0 ;
	        $ligne = SQL_tableau_associatif ($resultats, "") ;
		$prenom = prenom_eleve ($ligne ["prenoms_eleve"]) ;
	        $lg = "  <CENTER>" ;
		// Icone fiche eleve
		$lg .= "<A HREF=\"javascript:ouvrefenetre('./fiche_eleve.php?id_eleve=".$ligne ["id_eleve"]."&code=".$_SESSION ["code"]."',470,570,'yes');\">" ;
                $lg .= "<IMG SRC=\"../images/fiche.png\" TITLE=\"Acc&egrave;s fiche de ".$ligne ["nom"]." ".$prenom."\" BORDER=\"0\"></A>" ;
		// Recherche memo notes
		$lg .= icone_notes ($ligne ["id_eleve"], $ligne ["repere1"], $ligne ["repere2"], $ligne ["nom_eleve"]." ".$prenom) ;
		// Recherche publipostage
		$lg .= icone_publipostage ($ligne ["id_eleve"], $ligne ["repere1"], $ligne ["repere2"], $ligne ["nom_eleve"]." ".$prenom, Date ("Y-m-d")) ;
		$lg .= "<B><FONT SIZE=\"+1\">R&eacute;gularisation(s)&nbsp;de&nbsp;" ; //
		
	        $lg .= "<FONT COLOR=\"#0000FF\">".$prenom."&nbsp;".$ligne ["nom_eleve"]."</FONT>&nbsp;(".$ligne ["nom_classe"]."&nbsp;".$ligne ["nom_bref_classe"].")<BR>" ;
	        $dt = Explode ("-", $date) ;
	        $lg .= "pour&nbsp;le&nbsp;".$nom_jour [(integer)Date ("w", MkTime (0,0,0,$dt [1],$dt [2],$dt [0]))]."&nbsp;".$dt [2]."&nbsp;".$nom_mois [(integer)$dt [1]]."&nbsp;".$dt [0] ;
	        $lg .= "</B></CENTER>\n" ;
		If (IsSet ($mess))
		 {
		  Switch ($mess)
		   {
		    Case 1 : $lg .= "<CENTER><FONT COLOR=\"#FF0000\"><B><BLINK>R&eacute;gularisation&nbsp;effectu&eacute;e&nbsp;!</BLINK></B></FONT></CENTER>\n" ;
		             Break ;
		    Case 2 : $lg .= "<CENTER><FONT COLOR=\"#FF0000\"><B>Aucune&nbsp;r&eacute;gularisation&nbsp;n'a&nbsp;&eacute;t&eacute;&nbsp;effectu&eacute;&nbsp;!</B></FONT></CENTER>\n" ;
		             Break ;
                   }
		 }
	        $lg .= "  <FORM ACTION=\"".$_SERVER ["PHP_SELF"]."\" NAME=\"regul\" METHOD=\"POST\">\n" ;
	        $lg .= "   <INPUT TYPE=HIDDEN NAME=\"menu\" VALUE=\"210\">\n" ;
	        $lg .= "   <INPUT TYPE=HIDDEN NAME=\"regularisation\" VALUE=\"1\">\n" ;
	        $lg .= "   <INPUT TYPE=HIDDEN NAME=\"id_eleve\" VALUE=\"".$ligne ["id_eleve"]."\">\n" ;
	        $lg .= "   <INPUT TYPE=HIDDEN NAME=\"date\" VALUE=\"".$ligne ["date"]."\">\n" ;
	        $lg .= "   <TABLE BORDER=1 ALIGN=CENTER BGCOLOR=\"".$l ["couleur_fond"]."\" CELLSPACING=0 CELLPADDING=0 STYLE=\"border-collapse:collapse\">\n" ;
	        $lg .= "    <TR>\n" ;
                $lg .= "     <TD>\n" ;
                $lg .= "   <TABLE BORDER=0 ALIGN=CENTER CELLSPACING=0 CELLPADDING=0>\n" ;
	        $lg .= "    <TR BGCOLOR=\"".$l ["lien"]."\">\n" ;
	        $lg .= "     <TD ALIGN=CENTER><A HREF=\"javascript:change_selection()\"><IMG SRC=\"../images/absences/select_bas.png\" BORDER=0></A></TD>\n" ;
	        $lg .= "     <TD ALIGN=CENTER>&nbsp;<FONT SIZE=\"".$l ["titre"]."\"><B>Heure</B></FONT>&nbsp;</TD>\n" ;
	        $lg .= "     <TD ALIGN=CENTER>&nbsp;<FONT SIZE=\"".$l ["titre"]."\"><B>Type</B></FONT>&nbsp;</TD>\n" ;
	        $lg .= "     <TD ALIGN=CENTER>&nbsp;<FONT SIZE=\"".$l ["titre"]."\"><B>Arriv&eacute;e</B></FONT>&nbsp;</TD>\n" ;
	        $lg .= "     <TD ALIGN=CENTER>&nbsp;<FONT SIZE=\"".$l ["titre"]."\"><B>Commentaires</B></FONT>&nbsp;</TD>\n" ;
	        $lg .= "     <TD ALIGN=CENTER>&nbsp;<FONT SIZE=\"".$l ["titre"]."\"><B>Cours</B></FONT>&nbsp;</TD>\n" ;
		$lg .= "     <TD ALIGN=CENTER>&nbsp;<FONT SIZE=\"".$l ["titre"]."\"><B>Enseignant</B></FONT>&nbsp;</TD>\n" ;
	        $lg .= "    </TR>\n" ;
		$numero = 0 ;
                
	        While ($compteur <= SQL_nbr_lignes ($resultats))
	         {
		  $numero++ ;
	          $eleve = $ligne ["id_eleve"] ;
                  $date_seq = $ligne ["date"] ;
	          $dt = Explode ("-", $date_seq) ;
	          $hr = Explode (":", $ligne ["debut"]) ;
	          $jr = Date ("w",MkTime ($hr [0], $hr [1], $hr [2], $dt [1], $dt [2], $dt [0])) ;
	          $vt = valide_tranche ($ligne ["id_utilisateur"],$ligne ["date"],$jr,$ligne ["debut"]) ;
	          $saisie = $vt [0] ;
                  If ($saisie < 0) { $grp = -$vt [1] ; } Else { $grp = $vt [1] ; }
	          $table = tranches_identiques ($ligne ["id_utilisateur"], $date_seq, $jr, $ligne ["debut"], $ligne ["classe"], $grp, $ligne ["discipline"]) ;
	          // ERREUR : Emploi du temps non trouve !!!!
	          If ($table [0][0] == 0)
		   {
		    //Exit () ;
                   }
	          
	   	  $lg .= "    <TR" ; If ($compteur%2) { $lg .= " BGCOLOR=\"".$l ["nom"]."\"" ; }
	  	  $lg .= ">\n" ;
                  $dte = Explode ("-", $ligne ["date"]) ;
		  $lg .= "     <TD><INPUT TYPE=CHECKBOX TITLE=\"S&eacute;lection de ".Str_Replace (":", "H", SubStr ($ligne ["debut"], 0, 5))." a " ;
		  $lg .= Str_Replace (":", "H", SubStr ($ligne ["fin"], 0, 5))."\" NAME=\"s_".$numero."\" VALUE=\"1\" CHECKED></TD>\n" ;
	          $lg .= "     <TD ALIGN=CENTER>\n" ;
		  
		  // Javascript (suite)
		  Echo "     if (e.s_".$numero.".checked == 1) { e.s_".$numero.".checked = 0 } else { e.s_".$numero.".checked = 1 }\n" ;
		  
		  // Recherche de la plage totale du cours considere
		  $d = Explode (":", $ligne ["debut"]) ;
		  $i = 1 ;
		  If ($table [0][0] == 0)
		   {
		    // Sans EDT
		    $lg .= "      <INPUT TYPE=\"HIDDEN\" NAME=\"a_".$numero."_1\" VALUE=\"".$ligne ["id_abs_saisie"]."\">\n" ;
		    $compteur++ ;
		    $ligne_prec = $ligne ;
		    $ligne = SQL_tableau_associatif ($resultats, "") ;
		    $i++ ;
                   }
                  Else
		   {
	            While (($i <= $table [0][0]) And ($ligne ["date"] == $date_seq) And ($ligne ["tranche"] == $table [$i][1]))
                     {
		      $lg .= "      <INPUT TYPE=HIDDEN NAME=a_".$numero."_".$i." VALUE=\"".$ligne ["id_abs_saisie"]."\">\n" ;
		      $ligne_prec = $ligne ;
    	              $ligne = SQL_tableau_associatif ($resultats, "") ;
		      $i++ ;
		      $compteur++ ;
	             }
                   }
                  $lg .= "      <INPUT TYPE=HIDDEN NAME=\"h_".$numero."\" VALUE=\"".($i-1)."\">\n" ;
	          $f = Explode (":", $ligne_prec ["fin"]) ;
                  
	          $lg .= "      &nbsp;<FONT SIZE=\"".$l ["titre"]."\">&nbsp;".$d [0]."H".$d [1]."&nbsp;a&nbsp;".$f [0]."H".$f [1]."</FONT>&nbsp;</TD>\n" ;
		  $lg .= "     <TD ALIGN=CENTER>&nbsp;<FONT SIZE=\"".$l ["titre"]."\">" ;
	          If ($ligne_prec ["sexe"] == "F") { $lg .= $ligne_prec ["nom_f"] ; } Else { $lg .= $ligne_prec ["nom_g"] ; }
	          $lg .= "</FONT>&nbsp;</TD>\n" ;
	          $lg .= "     <TD ALIGN=CENTER>&nbsp;" ;
	          If ($ligne_prec ["arrivee"] != "00:00:00") { $lg .= "<FONT SIZE=\"".$l ["titre"]."\">".$ligne_prec ["arrivee"]."</FONT>" ; }
	          $lg .= "&nbsp;</TD>\n" ;
	          $lg .= "     <TD>&nbsp;<FONT SIZE=\"".$l ["titre"]."\">".$ligne_prec ["commentaires"]."</FONT>&nbsp;</TD>\n" ;
		  If ($table [0][0] == 0)
		   {
		    // Sans EDT
		    $lg .= "     <TD COLSPAN=\"2\">&nbsp;</TD>\n" ;
		   }
                  Else
		   {
		    // Avec EDT
	            $lg .= "     <TD>&nbsp;<FONT SIZE=\"".$l ["titre"]."\">".$ligne_prec ["nom_bref"]."</FONT>&nbsp;</TD>\n" ;
		    If (StrPos ($ligne_prec ["prenom"], " "))
		     {
		      $prenom = SubStr ($ligne_prec ["prenom"], 0, StrPos ($ligne_prec ["prenom"], " ")) ;
		     }
                    Else
		     {
		      $prenom = $ligne_prec ["prenom"] ;
		     }
                    $nom = StrToUpper (SubStr ($ligne_prec ["nom"], 0, 1)).StrToLower (SubStr ($ligne_prec ["nom"], 1, StrLen ($ligne_prec ["nom"])-1)) ;
                    //$prenom = StrToUpper (SubStr ($prenom, 0, 1)).StrToLower (SubStr ($prenom, 1, StrLen ($prenom)-1)) ;
		    $lg .= "     <TD>&nbsp;<FONT SIZE=\"".$l ["titre"]."\">" ;
		    Switch ($ligne_prec ["civilite"])
		     {
		       Case 0 : $lg .= "Mme" ; Break ;
		       Case 1 : $lg .= "Mlle" ; Break ;
		      Default : $lg .= "M." ; Break ;
		     }
		    $lg .= "&nbsp;".$nom."</FONT>&nbsp;</TD>\n" ;
                   }
	          $lg .= "    </TR>\n" ;
                 }
                // Fin javascript
                Echo "    }\n" ;
		Echo "   top.travail.travail_menu.document.classe.classe.value=0\n" ;
		Echo "  </SCRIPT>\n" ;
		Echo " </HEAD>\n" ;
		$resultats = SQL_commande ("SELECT * FROM menus WHERE numero='$droit_courant' ORDER BY ordre", $id_sql) ;
                $ligne = SQL_tableau_associatif ($resultats, "") ;
                Echo " <BODY BACKGROUND=\"../images/fond.png\" TEXT=\"".$ligne ["couleur_texte"]."\">\n" ;
		
                $lg .= "   </TABLE>\n " ;
	        $lg .= "     </TD>\n " ;
	        $lg .= "    </TR>\n " ;
	        $lg .= "   </TABLE>\n " ;
	        $lg .= "   <INPUT TYPE=HIDDEN NAME=\"nombre\" VALUE=\"".$numero."\">\n" ;
	        
	        // Formulaire de regularisation
	        $lg .= "   <BR><TABLE BORDER=0 BGCOLOR=\"".$l ["couleur_fond"]."\" ALIGN=CENTER CELLSPACING=0 CELLPADDING=0>\n" ;
	        $lg .= "    <TR>\n" ;
	        $lg .= "     <TD BGCOLOR=\"".$l ["lien"]."\" ALIGN=CENTER>&nbsp;<FONT SIZE=\"".$l ["titre"]."\">Type&nbsp;de&nbsp;Justification&nbsp;:</FONT>&nbsp;</TD>\n" ;
	        $lg .= "     <TD WIDTH=\"1\" ROWSPAN=4 BGCOLOR=\"#000000\"></TD>\n" ;
	        $lg .= "     <TD BGCOLOR=\"".$l ["lien"]."\" ALIGN=RIGHT>&nbsp;<FONT SIZE=\"".$l ["titre"]."\">Motif&nbsp;:</FONT>&nbsp;</TD>\n" ;
	        $lg .= "     <TD BGCOLOR=\"".$l ["lien"]."\">" ;
	        $lg .= "<FONT SIZE=\"".$l ["titre"]."\"><SELECT NAME=\"motif\" onchange=\"javascript:modif_motif()\"><OPTION VALUE=\"0\" STYLE=\"background-color:".$l ["lien"]."\">Nouveau MOTIF</OPTION>" ;
	        $resultats = SQL_commande ("SELECT id_abs_motif,nom,selection FROM abs_motifs ORDER BY nom", $id_sql) ;
	        For ($i = 0 ; $i < SQL_nbr_lignes ($resultats) ; $i++)
	         {
		  $ligne = SQL_tableau_associatif ($resultats, "") ;
		  
		  $lg .= "<OPTION VALUE=".$ligne ["id_abs_motif"] ;
		  If ($ligne ["selection"] == 1) { $lg .= " SELECTED" ; }
                  $lg .= ">".$ligne ["nom"]."</OPTION>" ;
		 }
                $lg .= "</FONT>&nbsp;</TD>\n" ;
	        $lg .= "    </TR>\n" ;
	        $lg .= "    <TR>\n" ;
	        $lg .= "     <TD VALIGN=TOP BGCOLOR=\"".$l ["nom"]."\" ROWSPAN=3>\n" ;
	        $lg .= "      <TABLE BORDER=0 CELLSPACING=0 CELLPADDING=0>\n" ;
	        $resultats = SQL_commande ("SELECT * FROM abs_types_justificatif ORDER BY nom", $id_sql) ;
	        For ($i = 0 ; $i < SQL_nbr_lignes ($resultats) ; $i++)
	         {
	 	  $ligne = SQL_tableau_associatif ($resultats, "") ;
		  $lg .= "      <TR" ; If ($i%2) { $lg .= " BGCOLOR=\"".$l ["nom"]."\"" ; }
		  $lg .= ">\n" ;
		  $lg .= "       <TD ALIGN=RIGHT><INPUT TYPE=RADIO NAME=\"justificatif\" VALUE=\"".$ligne ["id_abs_type_justificatif"]."\" onclick=\"javascript:desactive_just()\"" ;
		  If ($ligne ["selection"] == 1) { $lg .= " CHECKED" ; }
		  $lg .= "></TD>\n" ;
		  $lg .= "       <TD>&nbsp;<FONT SIZE=\"".$l ["titre"]."\">".$ligne ["nom"]."</FONT>&nbsp;</TD>\n" ;
		  $lg .= "      </TR>\n" ;
		 }
                $lg .= "       <TR><TD ALIGN=RIGHT><INPUT TYPE=RADIO NAME=\"justificatif\" VALUE=\"0\" onclick=\"javascript:active_just()\"></TD>" ;
                $lg .= "<TD><INPUT TYPE=TEXT NAME=\"nouv_just\" VALUE=\"nouveau justificatif\" SIZE=20 MAXLENGTH=100 DISABLED>&nbsp;</TD></TR>\n" ;
	        $lg .= "       <TR><TD COLSPAN=2>&nbsp;</TD></TR>\n" ;
	        $lg .= "      </TABLE>\n" ;
                $lg .= "     </TD>\n" ;
	        $lg .= "     <TD></TD>\n" ;
	        $lg .= "     <TD><FONT SIZE=\"".$l ["titre"]."\"><I>ou&nbsp;(nouveau&nbsp;motif)</FONT>&nbsp;</TD>\n" ;
	        $lg .= "    </TR>\n" ;
	        $lg .= "    <TR>\n" ;
	        $lg .= "     <TD></TD>\n" ;
	        $lg .= "     <TD>&nbsp;<INPUT TYPE=TEXT NAME=\"nouv_motif\" VALUE=\"nouveau motif\" SIZE=30 MAXLENGTH=200 DISABLED>&nbsp;</TD>\n" ;
	        $lg .= "    </TR>\n" ;
	        $lg .= "    <TR><TD COLSPAN=2 ALIGN=RIGHT><INPUT TYPE=IMAGE SRC=\"../images/absences/valider.png\" NAME=submit VALUE=\"R&eacute;gulariser\">&nbsp;</TD></TR>\n" ;
	        $lg .= "   </TABLE>\n" ;
                $lg .= "  </FORM>\n" ;
	        Echo $lg ;
               }
              Else
	       {
	        Echo "<HTML>\n" ;
                Echo " <HEAD>\n" ;
                entete_html ("Garennes", "", 1) ;
	        Echo styles ("none", "none", "none", $l ["lien"], "none") ;
		Echo " </HEAD>\n" ;
		$resultats = SQL_commande ("SELECT * FROM menus WHERE numero='$droit_courant' ORDER BY ordre", $id_sql) ;
                $ligne = SQL_tableau_associatif ($resultats, "") ;
                Echo " <BODY BACKGROUND=\"../images/fond.png\" TEXT=\"".$ligne ["couleur_texte"]."\">\n" ;
	        Echo "  <CENTER><B><FONT SIZE=\"+1\">R&eacute;gularisation(s).</FONT><BR><BR>" ;
		If (IsSet ($mess))
		 {
		  Switch ($mess)
		   {
		    Case 1 : Echo "<CENTER><FONT COLOR=\"#FF0000\"><B><BLINK>R&eacute;gularisation&nbsp;effectu&eacute;e&nbsp;!</BLINK></B></FONT></CENTER>\n" ;
		             Break ;
		    Case 2 : Echo "<CENTER><FONT COLOR=\"#FF0000\"><B>Aucune&nbsp;r&eacute;gularisation&nbsp;n'a&nbsp;&eacute;t&eacute;&nbsp;effectu&eacute;&nbsp;!</B></FONT></CENTER>\n" ;
		             Break ;
                   }
		 }
	        Echo "<U>Pas&nbsp;de&nbsp;r&eacute;gularisation&nbsp;</U>&nbsp;possible<BR><BR>" ;
	        $eleve = SQL_commande ("SELECT nom,prenoms FROM eleves WHERE id_eleve='".$id_eleve."' LIMIT 1", $id_sql) ;
	        $el = SQL_ligne_suivante ($eleve) ;
	        If (StrPos ($el [1], " "))
	         {
	         $prenom = SubStr ($el [1], 0, StrPos ($el [1], " ")) ;
	         }
                Else
	         {
	          $prenom = $el [1] ;
	         }
                $prenom = StrToUpper (SubStr ($prenom, 0, 1)).StrToLower (SubStr ($prenom, 1, StrLen ($prenom)-1)) ;
	        Echo "pour&nbsp;l'&eacute;l&egrave;ve&nbsp;<FONT COLOR=\"#0000FF\"><I>".$el [0]."&nbsp;".$prenom."</I></FONT><BR><BR>" ;
  	        $dt1 = Explode ("-", $date) ;
	        Echo "pour&nbsp;le&nbsp;".$nom_jour [(integer)Date ("w",MkTime (0,0,0,$dt1[1],$dt1[2],$dt1[0]))]."&nbsp;".$dt1 [2] ;
                Echo "&nbsp;".$nom_mois [(integer)$dt1[1]]."&nbsp;".$dt1 [0]."</B></CENTER>\n" ;
	       }
              Echo " </BODY>\n" ;
	      Echo "</HTML>\n" ;
?>